(copy_intervals_to_string): Take arg as buffer.

diff --git a/src/intervals.c b/src/intervals.c
index c399d40d10f1d516c8cdcf3e877c0d5f46a95509..00c7395cbb08ff77b75c5250c017ea90129caa3a 100644 (file)
--- a/src/intervals.c
+++ b/src/intervals.c
@@ -1843,10 +1843,11 @@ copy_intervals (tree, start, length)
 
 INLINE void
 copy_intervals_to_string (string, buffer, position, length)
-     Lisp_Object string, buffer;
+     Lisp_Object string;
+     struct buffer *buffer;
      int position, length;
 {
-  INTERVAL interval_copy = copy_intervals (BUF_INTERVALS (XBUFFER (buffer)),
+  INTERVAL interval_copy = copy_intervals (BUF_INTERVALS (buffer),
                                           position, length);
   if (NULL_INTERVAL_P (interval_copy))
     return;